Top 10k strings from Z5 Horse Forecaster (1982)(Bureau of Information Science).z80 in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [Z80] (TOSEC-v2007-01-01) /

Back to the directory listing

   4 d(x1,a)>d(i,a)
   2 y,o;h$(i);
   2 o;" to nearest furlong.":
   1 z$(k+a)>"9"
   1 z$(k+a)<"0"
   1 y(d)=y(b):
   1 y(d)=y(a):
   1 y(b)=y(c):
   1 y(a)=y(b):
   1 y$=n$+" Handicap   Book":
   1 y$="9"+y$:
   1 x(d)=x(b):
   1 x(d)=x(a):
   1 x(b)=x(c):
   1 x(a)=x(b):
   1 v(i)=v(x1):
   1 u(z,b)=g*x+y:
   1 u(i,b)=u(i,a):
   1 u(i,a)=g*x+y:
   1 t(i)=(n<d):
   1 r+d,o;"Enter speed figure for horse    with '*' from Handicap Book. If no figure is given then enter 0.If you make a mistake enter -1.":
   1 r(i,e-k)=x:
   1 p,o;z$;" not found";i$;i$:
   1 p,o;"Horse found is ";h$(i):
   1 o;y$;" (y/n) ?":
   1 o;"You should enter details of thisrace as shown at the top of the list of runners.  The distance  should be rounded ";
   1 o;" to the   next furlong -"
   1 o,o;"Stones";k$:
   1 o,o;"Pounds";k$:
   1 o,o;"Enter the horses which are at   the three shortest odds.  Enter the name of the horse which is  number ";z;" in the betting.":
   1 m,o;i$;i$:
   1 m,o;"There is no weight entered
   1 m,o;"Stones";k$;i$:
   1 m,o;"Pounds";k$:
   1 m,o;"Please include spaces between   results, name and weight";i$:
   1 l,o;"If no rating is given enter '0';if two are given enter the ";
   1 l$(ff);" bet":
   1 l$(ff);" bet"
   1 j$;" or ":
   1 i1,o;i;". ";
   1 i1,c;z$;i$;
   1 i1,c;"Enter details of next horse";
   1 h$(i)=z$(j+a
   1 g,o;"The following details can be    found under '";j$(b
   1 g);" Form' or in ";n$;"Form Guide":
   1 d,o;"Last-but-one race:";d(z,b);" f":
   1 d(z,b)=d(w,a):
   1 d(x1,a)>d(i,b)
   1 d(x1,a)=z:
   1 d(i,b)=d(x1,b):
   1 d(i,a)=d(x1,a):
   1 c,o;"Weight last race: ";z$:
   1 b,o;"Value of last race `";x:
   1 a;"lower":
   1 a2,o;m$;i$:
   1 a2,o;"Enter weight in previous race   as before e.g. 9 13";i$:
   1 a2,o;"Enter value of last race.";i$:
   1 a2,o;"Enter distance last race rounded";
   1 a2,o;"Enter distance last race but onerounded ";
   1 a2,o;"Are details correct (y/n) ?";i$;i$:
   1 a,o;"Last race distance:";d(z,a);" f":
   1 To finish press ENTER
   1 Press ENTER to continuer
   1 Mill ReeLinden TIrish BaLombardoAthens WThe ParsHomeric Zug
   1 ExcellentVery goodPossible Poor
   1 Do you have a copy of a
   1 Are details correct (y/n) ?O
   1 'Sporting Life'N
   1 'Sporting Chronicle'E
   1 "The Z5 program needs data that  is most easily obtained from":
   1 "Results can include '-' and '/' to show the ends of the previousseasons.  Weight must be enteredas '9 13' for 9 stone 13 pounds.":
   1 "Results - name - weight":
   1 "Racecourse:";
   1 "Race time:";
   1 "Race date:";
   1 "Prize money: ` ";:
   1 "Prize money is the amount gainedby the winning horse.":
   1 "No Form":
   1 "Is this";m$(r
   1 "If you make a mistake enter '-1'Enter rating for horse with '*'":
   1 "Enter race details:";
   1 "Enter horses' details as followsResults - Name - Weight in race":
   1 "Enter Weight Adjusted Ratings";
   1 "Do you want to make another
   1 "Distance in furlongs: ";:
   1 "1 mile 4 furlongs and 133 yards would be entered as '";
   1  incorrectn
   1  forecast (y/n) ?":
   1  Outsider Eliminate
   1  Meaden  MilleniuL'ApacheFrascatiBourbon Juggerna
   1  FORECAST SEQUENCE